home *** CD-ROM | disk | FTP | other *** search
/ Pro One: Electronic Devices / ProOne: Electronics - Electronic Devices.iso / progfile.sfs / ELECT332.EXE / 0 / RCDATA / TNEWSTUDENTFORM / TNEWSTUDENTFORM.txt
Encoding:
Text File  |  1998-04-23  |  7.5 KB  |  265 lines
  1. object NewStudentForm: TNewStudentForm
  2.   Left = 248
  3.   Top = 104
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsDialog
  6.   Caption = 'New Student Info'
  7.   ClientHeight = 394
  8.   ClientWidth = 575
  9.   Color = clSilver
  10.   Font.Color = clBlack
  11.   Font.Height = -19
  12.   Font.Name = 'Arial'
  13.   Font.Style = []
  14.   PixelsPerInch = 120
  15.   Position = poScreenCenter
  16.   Scaled = False
  17.   ShowHint = True
  18.   OnCreate = FormOnCreate
  19.   TextHeight = 22
  20.   object Label1: TLabel
  21.     Left = 63
  22.     Top = 12
  23.     Width = 425
  24.     Height = 84
  25.     Alignment = taCenter
  26.     Caption = 
  27.       'The information below will be used to help keep track of your pr' +
  28.       'ogress.  The Student Number is optional but is useful in classro' +
  29.       'oms where more than one person uses this program.'
  30.     Font.Color = clBlack
  31.     Font.Height = -18
  32.     Font.Name = 'Arial'
  33.     Font.Style = [fsBold]
  34.     ParentFont = False
  35.     WordWrap = True
  36.   end
  37.   object Panel1: TPanel
  38.     Left = 28
  39.     Top = 111
  40.     Width = 512
  41.     Height = 217
  42.     BevelInner = bvRaised
  43.     Color = clSilver
  44.     TabOrder = 0
  45.     object Label2: TLabel
  46.       Left = 65
  47.       Top = 36
  48.       Width = 117
  49.       Height = 26
  50.       Hint = 'Your first name, 15 characters max'
  51.       Alignment = taRightJustify
  52.       Caption = 'First Name:'
  53.       Color = clSilver
  54.       Font.Color = clBlack
  55.       Font.Height = -22
  56.       Font.Name = 'Arial'
  57.       Font.Style = [fsBold]
  58.       ParentColor = False
  59.       ParentFont = False
  60.     end
  61.     object Label3: TLabel
  62.       Left = 66
  63.       Top = 78
  64.       Width = 116
  65.       Height = 26
  66.       Hint = 'Your last name, 25 characters max'
  67.       Alignment = taRightJustify
  68.       Caption = 'Last Name:'
  69.       Font.Color = clBlack
  70.       Font.Height = -22
  71.       Font.Name = 'Arial'
  72.       Font.Style = [fsBold]
  73.       ParentFont = False
  74.     end
  75.     object Label4: TLabel
  76.       Left = 91
  77.       Top = 157
  78.       Width = 174
  79.       Height = 26
  80.       Hint = 'Numeric digits only, for classroom use (optional)'
  81.       Alignment = taRightJustify
  82.       Caption = 'Student Number:'
  83.       Font.Color = clBlack
  84.       Font.Height = -22
  85.       Font.Name = 'Arial'
  86.       Font.Style = [fsBold]
  87.       ParentFont = False
  88.     end
  89.     object Bevel1: TBevel
  90.       Left = 3
  91.       Top = 129
  92.       Width = 506
  93.       Height = 6
  94.       Shape = bsTopLine
  95.       Style = bsRaised
  96.     end
  97.     object OvcPfFirstName: TOvcPictureField
  98.       Left = 198
  99.       Top = 31
  100.       Width = 146
  101.       Height = 31
  102.       Cursor = crIBeam
  103.       Hint = 'Your first name, 15 characters max'
  104.       AutoSelect = False
  105.       CaretOvr.Shape = csBlock
  106.       CaretToEnd = False
  107.       Color = clWhite
  108.       Controller = OvcController1
  109.       DisabledColors.BackColor = clWindow
  110.       DisabledColors.TextColor = clGrayText
  111.       Epoch = 0
  112.       ErrorColors.BackColor = clRed
  113.       ErrorColors.TextColor = clBlack
  114.       Font.Color = clBlack
  115.       Font.Height = -22
  116.       Font.Name = 'Arial'
  117.       Font.Style = []
  118.       HighlightColors.BackColor = clHighlight
  119.       HighlightColors.TextColor = clHighlightText
  120.       MaxLength = 15
  121.       ParentFont = False
  122.       PictureMask = 'xxxxxxxxxxxxxxx'
  123.       TabOrder = 0
  124.       OnChange = StringFieldChanged
  125.     end
  126.     object OvcPfLastName: TOvcPictureField
  127.       Left = 198
  128.       Top = 72
  129.       Width = 239
  130.       Height = 31
  131.       Cursor = crIBeam
  132.       Hint = 'Your last name, 25 characters max'
  133.       AutoSelect = False
  134.       CaretOvr.Shape = csBlock
  135.       CaretToEnd = False
  136.       Color = clWhite
  137.       Controller = OvcController1
  138.       DisabledColors.BackColor = clWindow
  139.       DisabledColors.TextColor = clGrayText
  140.       Epoch = 0
  141.       ErrorColors.BackColor = clRed
  142.       ErrorColors.TextColor = clBlack
  143.       Font.Color = clBlack
  144.       Font.Height = -22
  145.       Font.Name = 'Arial'
  146.       Font.Style = []
  147.       HighlightColors.BackColor = clHighlight
  148.       HighlightColors.TextColor = clHighlightText
  149.       MaxLength = 25
  150.       ParentFont = False
  151.       PictureMask = 'xxxxxxxxxxxxxxxxxxxxxxxxx'
  152.       TabOrder = 1
  153.       OnChange = StringFieldChanged
  154.     end
  155.     object OvcPfStudentNum: TOvcPictureField
  156.       Left = 282
  157.       Top = 151
  158.       Width = 115
  159.       Height = 31
  160.       Cursor = crIBeam
  161.       Hint = 'Numeric digits only, for classroom use (optional)'
  162.       DataType = pftLongInt
  163.       CaretOvr.Shape = csBlock
  164.       Color = clWhite
  165.       Controller = OvcController1
  166.       DisabledColors.BackColor = clWindow
  167.       DisabledColors.TextColor = clGrayText
  168.       Epoch = 0
  169.       ErrorColors.BackColor = clRed
  170.       ErrorColors.TextColor = clBlack
  171.       Font.Color = clBlack
  172.       Font.Height = -22
  173.       Font.Name = 'Arial'
  174.       Font.Style = []
  175.       HighlightColors.BackColor = clHighlight
  176.       HighlightColors.TextColor = clHighlightText
  177.       MaxLength = 9
  178.       ParentFont = False
  179.       PictureMask = '999999999'
  180.       TabOrder = 2
  181.       TrimBlanks = False
  182.       RangeHigh = {FFC99A3B000000000000}
  183.       RangeLow = {00000000000000000000}
  184.     end
  185.   end
  186.   object BitBtnSave: TBitBtn
  187.     Left = 142
  188.     Top = 341
  189.     Width = 136
  190.     Height = 41
  191.     Hint = 'Click here to save your information for future use'
  192.     Caption = 'Save'
  193.     Default = True
  194.     Font.Color = clBlack
  195.     Font.Height = -22
  196.     Font.Name = 'Arial'
  197.     Font.Style = [fsBold]
  198.     ModalResult = 1
  199.     ParentFont = False
  200.     TabOrder = 1
  201.     OnClick = ButtonOnClick
  202.     OnMouseDown = ButtonOnMouseDown
  203.     Glyph.Data = {
  204.       76010000424D7601000000000000760000002800000020000000100000000100
  205.       0400000000000001000000000000000000000000000000000000000000000000
  206.       80000080000000808000800000008000800080800000C0C0C000808080000000
  207.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333833333
  208.       33333333333333333333333330833333333333333F333333333333330A083333
  209.       33333333F8F3333333333333AA0883333333333388F3333333333330AAA08333
  210.       3333333F888F33333333330AAAA08833333333F8888F33333333330AAAAA0833
  211.       333333F88888F333333330AAFFAA088333333F880088F3333333FAFF33AAA083
  212.       3333080033888F333333FF3333FAA0883333003333088F3333333333333FAA08
  213.       83333333333088F3333333333333FAA0883333333333088F3333333333333FAA
  214.       0883333333333088F3333333333333FAA0883333333333088F3333333333333F
  215.       AA0833333333333088F33333333333333FF33333333333333003}
  216.     NumGlyphs = 2
  217.   end
  218.   object BitBtnCancel: TBitBtn
  219.     Left = 298
  220.     Top = 341
  221.     Width = 136
  222.     Height = 41
  223.     Hint = 'Click here to leave the student information as "unknown"'
  224.     Cancel = True
  225.     Caption = 'Cancel'
  226.     Font.Color = clBlack
  227.     Font.Height = -22
  228.     Font.Name = 'Arial'
  229.     Font.Style = [fsBold]
  230.     ModalResult = 2
  231.     ParentFont = False
  232.     TabOrder = 2
  233.     OnClick = ButtonOnClick
  234.     OnMouseDown = ButtonOnMouseDown
  235.     Glyph.Data = {
  236.       76010000424D7601000000000000760000002800000020000000100000000100
  237.       0400000000000001000000000000000000000000000000000000000000000000
  238.       80000080000000808000800000008000800080800000C0C0C000808080000000
  239.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
  240.       6666666666666666666666886666666886666666666666666666610886666610
  241.       8866661966666661966669108866611106666011966666111966691108861111
  242.       6666660119666111166666911088111666666601196611116666669111011166
  243.       6666666011911116666666691111186666666666011111666666666691110886
  244.       6666666660111966666666669111108666666666601119666666666691111088
  245.       6666666601111196666666661109110886666666011601196666666611669110
  246.       8866666611666011966666611666691108666666116666011966669166666691
  247.       1666666116666660196666966666666966666600666666660666}
  248.     NumGlyphs = 2
  249.   end
  250.   object OvcController1: TOvcController
  251.     EntryCommands.TableList = (
  252.       'Default'
  253.       True
  254.       ()
  255.       'WordStar'
  256.       False
  257.       ()
  258.       'Grid'
  259.       False
  260.       ())
  261.     Left = 542
  262.     Top = 362
  263.   end
  264. end
  265.